home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Programmer's Power Pack
/
Delphi Volume 1.iso
/
e_to_l
/
fbuilder
/
delphi
/
demos
/
vardlg.dfm
/
vardlg.txt
Wrap
Text File
|
1996-09-15
|
5KB
|
146 lines
object VariablesDlg: TVariablesDlg
Left = 109
Top = 87
ActiveControl = OKBtn
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Variables'
ClientHeight = 304
ClientWidth = 559
Font.Color = clBlack
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Pitch = fpVariable
Font.Style = [fsBold]
PixelsPerInch = 120
Position = poScreenCenter
OnActivate = FormActivate
TextHeight = 16
object Bevel1: TBevel
Left = 10
Top = 10
Width = 434
Height = 277
Shape = bsFrame
IsControl = True
end
object Label1: TLabel
Left = 20
Top = 224
Width = 50
Height = 20
Caption = '&Value'
end
object SpeedButton1: TSpeedButton
Left = 400
Top = 245
Width = 25
Height = 25
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555775777777
57705557757777775FF7555555555555000755555555555F777F555555555550
87075555555555F7577F5555555555088805555555555F755F75555555555033
805555555555F755F75555555555033B05555555555F755F75555555555033B0
5555555555F755F75555555555033B05555555555F755F75555555555033B055
55555555F755F75555555555033B05555555555F755F75555555555033B05555
555555F75FF75555555555030B05555555555F7F7F75555555555000B0555555
5555F777F7555555555501900555555555557777755555555555099055555555
55557777555555555555500555555555555557755555555555550000}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object OKBtn: TBitBtn
Left = 454
Top = 142
Width = 96
Height = 33
TabOrder = 0
Kind = bkOK
Margin = 2
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 454
Top = 212
Width = 96
Height = 32
TabOrder = 1
Kind = bkCancel
Margin = 2
Spacing = -1
IsControl = True
end
object BitBtn1: TBitBtn
Left = 454
Top = 20
Width = 96
Height = 33
Caption = '&Add'
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 454
Top = 80
Width = 96
Height = 33
Caption = '&Delete'
TabOrder = 3
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object ValueEdit: TEdit
Left = 20
Top = 242
Width = 373
Height = 28
MaxLength = 255
TabOrder = 4
end
object StringGrid1: TStringGrid
Left = 20
Top = 30
Width = 410
Height = 176
ColCount = 3
DefaultColWidth = 30
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
TabOrder = 5
OnSelectCell = StringGrid1SelectCell
ColWidths = (
30
257
39)
end
end